home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1998 October / Macworld (1998-10).dmg / Serious Demos / Morpha / 3DO.DXR / 00030_left-right.ls < prev    next >
Encoding:
Text File  |  1998-07-31  |  284 b   |  16 lines
  1. property mys
  2. global grouper
  3.  
  4. on beginSprite me
  5.   set mys to the spriteNum of me
  6. end
  7.  
  8. on mouseWithin me
  9.   set this to -(the left of sprite mys - the mouseH + 31) * 0.25
  10.   sendAllSprites(#movepoint, 0, this, 0, 0)
  11. end
  12.  
  13. on mouseEnter me
  14.   put "move on the x plane" into field "info"
  15. end
  16.